object SimulateForm: TSimulateForm
  Left = 227
  Top = 124
  Width = 988
  Height = 634
  Caption = 'Titrator 3.01: Titrate a Solution'
  Color = 16301063
  Font.Charset = ANSI_CHARSET
  Font.Color = clWindowText
  Font.Height = -16
  Font.Name = 'Times New Roman'
  Font.Style = [fsBold]
  Menu = MainMenu1
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 19
  object Label1: TLabel
    Left = 16
    Top = 16
    Width = 98
    Height = 19
    Caption = 'Titration Title:'
    Color = 16301063
    ParentColor = False
  end
  object Label2: TLabel
    Left = 8
    Top = 120
    Width = 53
    Height = 19
    Caption = 'Primary'
  end
  object Label3: TLabel
    Left = 232
    Top = 128
    Width = 184
    Height = 19
    Caption = 'Initial solution volume (mls)'
  end
  object Label4: TLabel
    Left = 232
    Top = 160
    Width = 192
    Height = 19
    Caption = 'Titrant volume/addition (mls)'
  end
  object Label5: TLabel
    Left = 232
    Top = 192
    Width = 115
    Height = 19
    Caption = 'Number of points'
  end
  object Label6: TLabel
    Left = 232
    Top = 224
    Width = 168
    Height = 19
    Caption = 'Total volume added (mls)'
  end
  object Label7: TLabel
    Left = 0
    Top = 192
    Width = 70
    Height = 19
    Caption = 'Secondary'
  end
  object Label8: TLabel
    Left = 16
    Top = 152
    Width = 38
    Height = 19
    Caption = 'Conc.'
  end
  object Label9: TLabel
    Left = 16
    Top = 224
    Width = 38
    Height = 19
    Caption = 'Conc.'
  end
  object Label10: TLabel
    Left = 176
    Top = 152
    Width = 42
    Height = 19
    Caption = 'Molar'
  end
  object Label11: TLabel
    Left = 176
    Top = 224
    Width = 42
    Height = 19
    Caption = 'Molar'
  end
  object Bevel1: TBevel
    Left = 232
    Top = 80
    Width = 305
    Height = 177
  end
  object Label12: TLabel
    Left = 658
    Top = 440
    Width = 80
    Height = 19
    Caption = '1st Species:'
  end
  object Label13: TLabel
    Left = 658
    Top = 464
    Width = 84
    Height = 19
    Caption = '2nd Species:'
  end
  object Label14: TLabel
    Left = 658
    Top = 488
    Width = 82
    Height = 19
    Caption = '3rd Species:'
  end
  object Label15: TLabel
    Left = 658
    Top = 512
    Width = 81
    Height = 19
    Caption = '4th Species:'
  end
  object Label16: TLabel
    Left = 658
    Top = 536
    Width = 81
    Height = 19
    Caption = '5th Species:'
  end
  object Label17: TLabel
    Left = 176
    Top = 280
    Width = 202
    Height = 24
    Caption = 'Titration Results Table'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -21
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label18: TLabel
    Left = 280
    Top = 88
    Width = 177
    Height = 19
    Caption = 'Set Experimental Volumes'
  end
  object Label19: TLabel
    Left = 32
    Top = 88
    Width = 159
    Height = 19
    Caption = 'Set Titrant Composition'
  end
  object Bevel2: TBevel
    Left = 0
    Top = 80
    Width = 225
    Height = 177
  end
  object TitleEdit: TEdit
    Left = 128
    Top = 8
    Width = 217
    Height = 27
    Hint = 'Enter identifying text for this titration'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    OnExit = TitleEditExit
  end
  object CationList: TComboBox
    Left = 72
    Top = 112
    Width = 145
    Height = 27
    Hint = 'Component present in titrant (req'#39'd)'
    AutoDropDown = True
    Style = csDropDownList
    ItemHeight = 19
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    OnExit = CationListExit
  end
  object DefLabel: TStaticText
    Left = 16
    Top = 40
    Width = 104
    Height = 23
    Caption = 'Definition File:'
    TabOrder = 2
  end
  object AnionList: TComboBox
    Left = 72
    Top = 184
    Width = 145
    Height = 27
    Hint = '2nd component in titrant (optional)'
    AutoDropDown = True
    Style = csDropDownList
    ItemHeight = 19
    ParentShowHint = False
    ShowHint = True
    TabOrder = 3
    OnExit = AnionListExit
  end
  object V0Edit: TEdit
    Left = 424
    Top = 120
    Width = 97
    Height = 27
    Hint = 'Volume of sample to be titrated'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 4
    OnExit = V0EditExit
  end
  object SimulateBtn: TButton
    Left = 440
    Top = 16
    Width = 75
    Height = 49
    Hint = 'Simulate the titration'
    Caption = 'Titrate'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 5
    OnClick = TitrateBtnClick
  end
  object TiDataGrid: TStringGrid
    Left = 16
    Top = 315
    Width = 505
    Height = 249
    Hint = 'Displays titration results- no editing'
    BiDiMode = bdLeftToRight
    ColCount = 141
    DefaultColWidth = 80
    RowCount = 102
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -13
    Font.Name = 'Times New Roman'
    Font.Style = [fsBold]
    Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine]
    ParentBiDiMode = False
    ParentFont = False
    TabOrder = 6
    RowHeights = (
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24
      24)
  end
  object DeltaVolEdit: TEdit
    Left = 424
    Top = 152
    Width = 97
    Height = 27
    Hint = 'Volume of titrant to add for each point in the titration'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 7
    OnExit = DeltaVolEditExit
  end
  object SimuPtsEdit: TEdit
    Left = 424
    Top = 184
    Width = 97
    Height = 27
    Hint = 'Number of additions in the titration'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 8
    OnExit = SimuPtsEditExit
  end
  object VFinalEdit: TEdit
    Left = 424
    Top = 216
    Width = 97
    Height = 27
    Hint = 'Program calculates final volume'
    Enabled = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 9
  end
  object AnionConcEdit: TEdit
    Left = 72
    Top = 216
    Width = 97
    Height = 27
    Hint = 'Concentration of secondary in titrant'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 10
    OnExit = AnionConcEditExit
  end
  object CationConcEdit: TEdit
    Left = 72
    Top = 144
    Width = 97
    Height = 27
    Hint = 'Concentration of primary in titrant'
    ParentShowHint = False
    ShowHint = True
    TabOrder = 11
    OnExit = CationConcEditExit
  end
  object SimulGraph: TChart
    Left = 546
    Top = 8
    Width = 415
    Height = 417
    Hint = 'Graphical display of titration results'
    AllowZoom = False
    BackWall.Brush.Color = clWhite
    BackWall.Brush.Style = bsClear
    BottomWall.Color = clBlack
    Foot.Font.Charset = ANSI_CHARSET
    Foot.Font.Color = clBlack
    Foot.Font.Height = -16
    Foot.Font.Name = 'Times New Roman'
    Foot.Font.Style = [fsBold]
    LeftWall.Brush.Color = clWhite
    LeftWall.Color = clBlack
    Title.Color = clWhite
    Title.Font.Charset = ANSI_CHARSET
    Title.Font.Color = clBlack
    Title.Font.Height = -21
    Title.Font.Name = 'Times New Roman'
    Title.Font.Style = [fsBold]
    Title.Frame.Width = 2
    Title.Frame.Visible = True
    Title.Text.Strings = (
      'Titration results')
    BottomAxis.LabelsFont.Charset = ANSI_CHARSET
    BottomAxis.LabelsFont.Color = clBlack
    BottomAxis.LabelsFont.Height = -16
    BottomAxis.LabelsFont.Name = 'Times New Roman'
    BottomAxis.LabelsFont.Style = [fsBold]
    BottomAxis.Title.Caption = 'Volume (mls)'
    BottomAxis.Title.Font.Charset = ANSI_CHARSET
    BottomAxis.Title.Font.Color = clBlack
    BottomAxis.Title.Font.Height = -16
    BottomAxis.Title.Font.Name = 'Times New Roman'
    BottomAxis.Title.Font.Style = [fsBold]
    LeftAxis.ExactDateTime = False
    LeftAxis.Increment = 1
    LeftAxis.LabelsFont.Charset = ANSI_CHARSET
    LeftAxis.LabelsFont.Color = clBlack
    LeftAxis.LabelsFont.Height = -16
    LeftAxis.LabelsFont.Name = 'Times New Roman'
    LeftAxis.LabelsFont.Style = [fsBold]
    LeftAxis.LabelStyle = talValue
    LeftAxis.MinorTicks.Visible = False
    LeftAxis.Ticks.Color = clBlack
    LeftAxis.Ticks.Width = 2
    LeftAxis.Title.Caption = 'Log Molar'
    LeftAxis.Title.Font.Charset = ANSI_CHARSET
    LeftAxis.Title.Font.Color = clBlack
    LeftAxis.Title.Font.Height = -16
    LeftAxis.Title.Font.Name = 'Times New Roman'
    LeftAxis.Title.Font.Style = [fsBold]
    Legend.Alignment = laBottom
    Legend.Font.Charset = ANSI_CHARSET
    Legend.Font.Color = clBlack
    Legend.Font.Height = -13
    Legend.Font.Name = 'Times New Roman'
    Legend.Font.Style = [fsBold]
    Legend.LegendStyle = lsSeries
    View3D = False
    TabOrder = 12
    object Series1: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = 4194368
      Dark3D = False
      InvertedStairs = True
      LinePen.Visible = False
      Pointer.HorizSize = 3
      Pointer.InflateMargins = True
      Pointer.Style = psCircle
      Pointer.VertSize = 3
      Pointer.Visible = True
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
    object Series2: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clRed
      Dark3D = False
      LineBrush = bsClear
      LinePen.Visible = False
      Pointer.HorizSize = 3
      Pointer.InflateMargins = False
      Pointer.Style = psRectangle
      Pointer.VertSize = 3
      Pointer.Visible = True
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
    object Series3: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clGreen
      LinePen.Visible = False
      Pointer.HorizSize = 3
      Pointer.InflateMargins = True
      Pointer.Style = psTriangle
      Pointer.VertSize = 3
      Pointer.Visible = True
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
    object Series4: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clYellow
      LinePen.Visible = False
      Pointer.HorizSize = 3
      Pointer.InflateMargins = True
      Pointer.Style = psDownTriangle
      Pointer.VertSize = 3
      Pointer.Visible = True
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
    object Series5: TLineSeries
      Marks.ArrowLength = 8
      Marks.Visible = False
      SeriesColor = clBlue
      LinePen.Visible = False
      Pointer.HorizSize = 3
      Pointer.InflateMargins = True
      Pointer.Style = psDiamond
      Pointer.VertSize = 3
      Pointer.Visible = True
      XValues.DateTime = False
      XValues.Name = 'X'
      XValues.Multiplier = 1
      XValues.Order = loAscending
      YValues.DateTime = False
      YValues.Name = 'Y'
      YValues.Multiplier = 1
      YValues.Order = loNone
    end
  end
  object YSelect: TComboBox
    Left = 762
    Top = 440
    Width = 201
    Height = 27
    Hint = 'Select a concentration to plot'
    ItemHeight = 19
    ParentShowHint = False
    ShowHint = True
    TabOrder = 13
    OnChange = YSelectChange
  end
  object Y2Select: TComboBox
    Left = 762
    Top = 464
    Width = 201
    Height = 27
    Hint = 'Select a concentration to plot'
    ItemHeight = 19
    ParentShowHint = False
    ShowHint = True
    TabOrder = 14
    OnChange = Y2SelectChange
  end
  object Y3Select: TComboBox
    Left = 762
    Top = 488
    Width = 201
    Height = 27
    Hint = 'Select a concentration to plot'
    ItemHeight = 19
    ParentShowHint = False
    ShowHint = True
    TabOrder = 15
    OnChange = Y3SelectChange
  end
  object Y4Select: TComboBox
    Left = 762
    Top = 512
    Width = 201
    Height = 27
    Hint = 'Select a concentration to plot'
    ItemHeight = 19
    ParentShowHint = False
    ShowHint = True
    TabOrder = 16
    OnChange = Y4SelectChange
  end
  object Y5Select: TComboBox
    Left = 762
    Top = 536
    Width = 201
    Height = 27
    Hint = 'Select a concentration to plot'
    ItemHeight = 19
    ParentShowHint = False
    ShowHint = True
    TabOrder = 17
    OnChange = Y5SelectChange
  end
  object LogMol: TRadioGroup
    Left = 536
    Top = 440
    Width = 113
    Height = 65
    Hint = 'Set Scale for graph'
    Caption = 'Units'
    Items.Strings = (
      'Molar'
      'Log Molar')
    ParentShowHint = False
    ShowHint = True
    TabOrder = 18
    OnClick = LogMolExit
    OnExit = LogMolExit
  end
  object MainMenu1: TMainMenu
    Left = 554
    Top = 528
    object File1: TMenuItem
      Caption = 'File'
      object New1: TMenuItem
        Caption = '&New'
        OnClick = New1Click
      end
      object Save1: TMenuItem
        Caption = '&Export'
        OnClick = Save1Click
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = Exit1Click
      end
    end
    object Editing: TMenuItem
      Caption = 'Edit'
      object EditSystem: TMenuItem
        Caption = 'Edit System Definition'
        OnClick = EditSystemClick
      end
      object EditParams: TMenuItem
        Caption = 'Edit Parameters'
        OnClick = EditParamsClick
      end
    end
    object Titrate: TMenuItem
      Caption = 'Titrate'
      OnClick = TitrateBtnClick
    end
    object MenuHelp: TMenuItem
      Caption = 'Help'
      object About1: TMenuItem
        Caption = 'About'
        OnClick = About1Click
      end
      object Topics: TMenuItem
        Caption = 'Topics'
        OnClick = TopicsClick
      end
    end
    object MenuExit: TMenuItem
      Caption = 'Exit'
      OnClick = MenuExitClick
    end
  end
  object SimulateSaveDialog: TSaveDialog
    DefaultExt = 'txt'
    Title = 'Save Titration Results As'
    Left = 594
    Top = 528
  end
end
